distr Subroutine

public subroutine distr(vz, j, ifound, fder)

Uses

- lock_module

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8)				::	vz
integer,	intent(in)			::	j
integer,	intent(inout)			::	ifound
real(kind=8)				::	fder